home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue42 / opengl / GLTexWin.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  1998-09-20  |  595 b   |  31 lines
  1. unit GLTexWin;
  2.  
  3. interface
  4.   Uses windows,Classes,opengl,GLFuncs,GLWin,GLLight;
  5.  
  6.  Type
  7.   TCustomGLTexture = class(TCustomGLLightWindow)
  8.    Private
  9.   (*   procedure PaintWindow(DC: HDC); override;*)
  10.  
  11.   end;
  12.  
  13. {procedure Register;}
  14.  
  15. implementation
  16. (*************************************************************)
  17. (*
  18. procedure TCustomGLTexture.PaintWindow(DC: HDC);
  19. Begin
  20.     Inherited PaintWindow(DC);
  21. end;
  22.  *)
  23. (*************************************************************)
  24. (*
  25. procedure Register;
  26. begin
  27.   RegisterComponents('OpenGL', [TCustomGLTexture]);
  28. end;
  29. *)
  30. end.
  31.